(askdir (prompt "Wo soll der Textloader installiert werden?\n(Bitte NEUE SCHUBLADE ANLEGEN...\nfür den Textloder!)")
(help "Hier muss der Ort, andem der Textloader installiert werden soll, Angegeben werden!"
"Bitte erzeugen Sie dann noch zusätzlich ein Neues Verzeichnis, denn der Textloader,"
"erzeugt keine Schublade von selbst! Starten Sie dann die Installation...!")
(default 'SYS:')))
(if (< (getdiskspace def-dest) 970000)
(abort "Ihr gewähltes Verzeichnis hat zu wenig Platz\n"
"für die Installation des Textloaders!\n"
"Bitte wählen Sie ein anderes Verzeichnis aus\n"
"und starten die Installation erneut!\n")
)
(copyfiles
(prompt "Texteditor Textloader")
(help " Die Textloader Installation wurde stark\n vereinfacht. Bitte Markieren Sie\n jede Datei die Sie Installieren möchten\n mit einem Häckchen!\n\n Der <Personal.font>, wird Automatisch, ohne\n Abfrage Installiert.")
(source "Textloader")
(dest def-dest )
(confirm)
)
(complete 10)
(copyfiles
(prompt "Icon/Pictogramm von Textloader?")
(help "Hilfe ist leider noch nicht geschrieben!")
(source "Textloader.info")
(dest def-dest )
(all)
)
(copyfiles
(prompt " Installation für den Textloader.font?\n Bitte Help anklicken!")
(help "Der Personal.font ist ein spezieller\n Zeichensatz, den der Textloader benutzt!\n Dieser Font bietet viele Vorteile,\n die nicht mit dem Standard TOPAZ-font\n Ausgenutzt werden können.\n\n\n BITTE UMBEDINGT INSTALLIEREN...")
(source "TL_Fonts")
(dest "Fonts:" )
(infos)
(all)
)
(complete 20)
(copyfiles
(prompt "Textloader Dokumentationen!")
(help "only the viewer no doc will be installed")
(source "Textloader.dok")
(dest def-dest )
(confirm)
)
(copyfiles
(prompt "Icon/Piktogramm mitkopieren?")
(help "only the viewer no doc will be installed")
(source "Textloader.dok.info")
(dest def-dest )
(All)
)
(copyfiles
(prompt "Schablonen kopieren?")
(help "Schablonen sind für die HTML")
(source "SchabloneInfo")
(dest def-dest )
(All)
)
(copyfiles
(prompt "Schablonen kopieren?")
(help "Werden für HTML benötigt")
(source "Schablone1")
(dest def-dest )
(All)
)
(copyfiles
(prompt "Textloader.guide installieren?")
(help "only the viewer no doc will be installed")
(source "Textloader.guide")
(dest def-dest )
(confirm)
)
(copyfiles
(prompt "Textloader.guide.info kopieren? ICON?")
(help "only the viewer no doc will be installed")
(source "Textloader.guide.info")
(dest def-dest )
(All)
)
(copyfiles
(prompt "Textloader.history installieren?")
(help "Installiert die History Dokumentation!")
(source "History.dok")
(dest def-dest )
(confirm)
)
(complete 50)
(copyfiles
(prompt "Textloader.history <ICON> kopieren?")
(help "Installiert das Piktogramm! Der Textdatei!")
(source "History.dok.info")
(dest def-dest )
(All)
)
(copyfiles
(prompt "PPshow4.0 von N.Francois Installieren?")
(help "Installiert PPshow!")
(source "Util/ppshow")
(dest "sys:c/" )
(confirm)
)
(set #copying-Mathieeedoub "\nCopying Mathieeedoubbas.lib to LIBS:")
(set #copying-Mathrans "\nCopying Mathieeedoubbtrans.lib to LIBS:")
